inherited frmCad_PagarReceber: TfrmCad_PagarReceber
  Left = 424
  Top = 245
  Caption = 'Pagar x Receber'
  ClientHeight = 440
  ClientWidth = 630
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 630
    Height = 89
    object Label1: TLabel
      Left = 87
      Top = 11
      Width = 47
      Height = 14
      Caption = 'Entidade'
    end
    object btnC_Entidade: TSpeedButton
      Left = 182
      Top = 10
      Width = 23
      Height = 22
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = btnC_EntidadeClick
    end
    object Label2: TLabel
      Left = 27
      Top = 36
      Width = 107
      Height = 14
      Caption = 'Tipo do Documento'
    end
    object Label3: TLabel
      Left = 7
      Top = 61
      Width = 127
      Height = 14
      Caption = 'N'#250'mero do Documento'
    end
    object btnC_TipoDocumento: TSpeedButton
      Left = 166
      Top = 34
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = btnC_TipoDocumentoClick
    end
    object btnC_TitCredito: TSpeedButton
      Left = 265
      Top = 59
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = btnC_TitCreditoClick
    end
    object edttipd_codigo: TEdit
      Left = 139
      Top = 34
      Width = 22
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 1
      TabOrder = 1
      OnEnter = edttipd_codigoEnter
      OnExit = edttipd_codigoExit
      OnKeyDown = edttipd_codigoKeyDown
    end
    object edttitc_numero: TEdit
      Left = 139
      Top = 59
      Width = 121
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      MaxLength = 20
      TabOrder = 2
      OnEnter = edttitc_numeroEnter
      OnExit = edttitc_numeroExit
      OnKeyDown = edttitc_numeroKeyDown
    end
    object edtEnt_Codigo: TEdit
      Left = 139
      Top = 10
      Width = 42
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      MaxLength = 5
      TabOrder = 0
      OnEnter = edtEnt_CodigoEnter
      OnExit = edtEnt_CodigoExit
      OnKeyDown = edtEnt_CodigoKeyDown
      OnKeyPress = edtEnt_CodigoKeyPress
    end
    object pnlEntidade: TPanel
      Left = 209
      Top = 10
      Width = 416
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      TabOrder = 3
    end
    object pnlTipoDoc: TPanel
      Left = 193
      Top = 34
      Width = 432
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      TabOrder = 4
    end
    object Edit2: TEdit
      Left = 328
      Top = 60
      Width = 62
      Height = 19
      TabStop = False
      BiDiMode = bdLeftToRight
      Color = 16570518
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -9
      Font.Name = 'Marlett'
      Font.Style = [fsBold]
      ParentBiDiMode = False
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
      Text = ' Vl.Nominal'
    end
    object vlorig: TCurrencyEdit
      Left = 389
      Top = 60
      Width = 85
      Height = 20
      TabStop = False
      AutoSize = False
      Color = 16570518
      Ctl3D = False
      DisplayFormat = 'R$ ,0.00'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 6
    end
    object Edit1: TEdit
      Left = 483
      Top = 60
      Width = 56
      Height = 19
      TabStop = False
      Color = 16056319
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -9
      Font.Name = 'Marlett'
      Font.Style = [fsBold]
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
      Text = 'Saldo ==>'
    end
    object edttitc_saldo: TCurrencyEdit
      Left = 539
      Top = 60
      Width = 85
      Height = 20
      TabStop = False
      AutoSize = False
      Color = 16056319
      Ctl3D = False
      DisplayFormat = 'R$ ,0.00'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 8
      OnChange = edttitc_saldoChange
    end
  end
  inherited Panel2: TPanel
    Top = 89
    Width = 630
    Height = 284
    object Label4: TLabel
      Left = 42
      Top = 202
      Width = 97
      Height = 14
      Caption = 'Valor a abater (R):'
    end
    object Label5: TLabel
      Left = 21
      Top = 226
      Width = 118
      Height = 14
      Caption = 'Valor a descontar (P):'
    end
    object Label6: TLabel
      Left = 20
      Top = 258
      Width = 117
      Height = 14
      Alignment = taRightJustify
      Caption = 'Saldo remanescente:'
    end
    object Shape1: TShape
      Left = 56
      Top = 249
      Width = 217
      Height = 2
    end
    object Label7: TLabel
      Left = 368
      Top = 178
      Width = 255
      Height = 14
      Caption = '[DEL] para eliminar os t'#237'tulos que n'#227'o ser'#227'o abatidos.'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object dbg: TDBGrid
      Left = 3
      Top = 3
      Width = 624
      Height = 174
      Align = alTop
      Ctl3D = False
      DataSource = ds
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ParentCtl3D = False
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      OnKeyDown = dbgKeyDown
      Columns = <
        item
          Alignment = taCenter
          Color = clBtnFace
          Expanded = False
          FieldName = 'Tipd_Codigo'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = 'Td.'
          Width = 27
          Visible = True
        end
        item
          Alignment = taCenter
          Color = clBtnFace
          Expanded = False
          FieldName = 'Titc_numero'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = 'N'#250'mero'
          Width = 140
          Visible = True
        end
        item
          Alignment = taCenter
          Color = clBtnFace
          Expanded = False
          FieldName = 'Titc_data'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = 'Data'
          Width = 99
          Visible = True
        end
        item
          Color = clBtnFace
          Expanded = False
          FieldName = 'Titc_Valor'
          ReadOnly = True
          Title.Alignment = taRightJustify
          Title.Caption = 'Valor'
          Width = 85
          Visible = True
        end
        item
          Color = clBtnFace
          Expanded = False
          FieldName = 'Titc_Saldo'
          ReadOnly = True
          Title.Alignment = taRightJustify
          Title.Caption = 'Saldo'
          Width = 85
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Valor'
          Title.Alignment = taRightJustify
          Title.Caption = 'Dedu'#231#245'es'
          Width = 85
          Visible = True
        end>
    end
    object edtAbater: TCurrencyEdit
      Left = 144
      Top = 200
      Width = 121
      Height = 21
      AutoSize = False
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 1
    end
    object edtDescontar: TCurrencyEdit
      Left = 144
      Top = 224
      Width = 121
      Height = 21
      AutoSize = False
      Ctl3D = False
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 2
    end
    object edtSaldo: TCurrencyEdit
      Left = 144
      Top = 256
      Width = 121
      Height = 21
      AutoSize = False
      Ctl3D = False
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 4
    end
    object btnCalcular: TButton
      Left = 280
      Top = 238
      Width = 89
      Height = 25
      Caption = 'C&alcular'
      TabOrder = 3
      OnClick = btnCalcularClick
    end
  end
  inherited Panel4: TPanel
    Top = 373
    Width = 630
    inherited btnCancelar1: TBitBtn
      Left = 283
      Top = 12
    end
    inherited btnFechar1: TBitBtn
      Left = 524
    end
    inherited BtnEliminar1: TBitBtn
      Top = 36
    end
    inherited btnlistagem1: TBitBtn
      Left = 395
      Top = 40
      Height = 21
    end
    inherited btnGravar: TFlatButton
      Left = 11
      OnClick = btnGravarClick
    end
    inherited BtnEliminar: TFlatButton
      Top = 36
      Visible = False
    end
    inherited btnCancelar: TFlatButton
      Left = 259
    end
    inherited btnlistagem: TFlatButton
      Top = 44
      Visible = False
    end
    inherited btnFechar: TFlatButton
      Left = 507
    end
  end
  inherited BS: TStatusBar
    Top = 421
    Width = 630
  end
  inherited Timer1: TTimer
    Left = 557
    Top = 12
  end
  inherited RDP: TRDprint
    Left = 556
    Top = 20
  end
  inherited JvApplicationHotKey1: TJvApplicationHotKey
    Left = 553
    Top = 25
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 560
    Top = 233
    object CDSTipd_Codigo: TStringField
      FieldName = 'Tipd_Codigo'
    end
    object CDSTitc_numero: TStringField
      FieldName = 'Titc_numero'
      Size = 25
    end
    object CDSEnt_codigo: TStringField
      FieldName = 'Ent_codigo'
    end
    object CDSTitc_Valor: TFloatField
      FieldName = 'Titc_Valor'
      currency = True
    end
    object CDSTitc_Saldo: TFloatField
      FieldName = 'Titc_Saldo'
      currency = True
    end
    object CDSValor: TFloatField
      FieldName = 'Valor'
      currency = True
    end
    object CDSDesconta: TBooleanField
      FieldName = 'Desconta'
    end
    object CDSTitc_data: TDateField
      FieldName = 'Titc_data'
    end
    object CDSEmp_Codigo: TStringField
      FieldName = 'Emp_Codigo'
    end
  end
  object ds: TDataSource
    DataSet = CDS
    Left = 592
    Top = 233
  end
end
